home *** CD-ROM | disk | FTP | other *** search
/ ADA Programming Guide / ADA Programming Guide.iso / ada_gwu / adaed / spider / draw3.ada < prev    next >
Encoding:
Text File  |  1996-01-30  |  180 b   |  20 lines
  1. WITH Spider; Use Spider;
  2. PROCEDURE Drawing3 IS 
  3. BEGIN 
  4. Reset; 
  5. Step;
  6. Step;
  7. Step;
  8. Step;
  9. Step;
  10. Step;
  11. Step;
  12. Step;
  13. Step;
  14. Step;
  15. Step;
  16. Step;
  17. Step;
  18. Quit;
  19. END Drawing3;
  20.